    Este programa "abre" um arquivo para leitura
de dados ou  "salva"  um conjunto de dados em um
um arquivo cujo nome  informado pelo usurio. 
necessrio criar um subdiretrio chamado "dados"
onde os arquivos sero copiados. Se quiser mudar
o nome do subdiretrio,  ele deve ser mudado nas
subrotinas "Open" e "Save".

Para executar o programa crie um workspace e
insira os seguintes arquivos no projeto:

Teste Open.f90, resource.fd, script1.rc, 
Subroutine Open.f90, Subroutine Save.f90 e 
comdlger.f90